home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Australian Personal Computer 2002 November
/
CD 1
/
APC0211D1.ISO
/
workshop
/
prog
/
files
/
ActivePerl-5.6.1.633-MSWin32.msi
/
_1970476adb3bdd32053fa7969b8fb105
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
Macintosh to JP
NeXTSTEP
RISC OS/Acorn
Shift JIS
UTF-8
Wrap
Text File
|
2002-06-17
|
402 b
|
17 lines
# NOTE: Derived from ..\..\lib\POSIX.pm.
# Changes made here will be lost when autosplit is run again.
# See AutoSplit.pm.
package POSIX;
#line 105 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\opendir.al)"
sub opendir {
usage "opendir(directory)" if @_ != 1;
my $dirhandle;
CORE::opendir($dirhandle, $_[0])
? $dirhandle
: undef;
}
# end of POSIX::opendir
1;